﻿Public Class Form2

    Dim i = 0

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If i = 0 Then
            Me.Label1.Text = "Working."
        End If
        If i = 1 Then
            Me.Label1.Text = "Working.."
        End If
        If i = 2 Then
            Me.Label1.Text = "Working..."

        End If
        If i = 3 Then
            Me.Label1.Text = "Working...."

        End If
        If i = 4 Then
            Me.Label1.Text = "Working"
        End If
        If i = 6 Then
            i = -1
        End If
        i = i + 1
    End Sub

    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class
